home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 32 / 032.d81 / alfredo boot (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  362b  |  15 lines
  1. 5 ifx=0thenx=1:load"unpacker",8,1
  2. 6 ifx=1thenx=2:load"alf.shp",8,1
  3. 7 ifx=2thenx=3:load"hi-res text.o",8,1
  4. 10 poke249,224:poke250,204:rem screen/color
  5. 20 poke251,0:poke252,64:rem shp buffer
  6. 30 poke253,0:poke254,0:rem   x-pos,y-pos
  7. 35 poke53280,.: rem  border
  8. 50 sys51456:    rem  unpack normal shp
  9. 60 sys51459
  10. 70 f$="alfredo"
  11. 80 print"[147]loadf$,8"
  12. 81 print""t$;
  13. 82 print"run"
  14. 83 poke631,13:poke632,13:poke198,2:end
  15.